home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / UTILITY / DO1002.ARJ / TUTORIAL.SCR < prev    next >
Text File  |  1991-12-31  |  4KB  |  273 lines

  1. * ----------------- A DO script tutorial ------------------------------
  2. .wi full clr
  3. * Reset EDIT and LIST variables incase DO.CFG exists
  4. /SET HoldEdit %Edit
  5. /SET EDIT ""
  6. /SET HoldList %List
  7. /SET LIST ""
  8. /STOP EOF
  9. /CANCEL ALL
  10. /SET t "c 14 1"
  11. /IF %Tutorial01 NE "" GetLabel
  12. /SET Label %Tutorial01
  13. /GOTO %Label NOTFOUND
  14. :GetLabel
  15. .clr
  16.  
  17.  
  18.        Enter a command or section at which to start the tutorial.
  19.          Press »bo«<enter>»#« to take the complete tutorial.
  20.  
  21.  
  22.  
  23. /BOX 1 1 80 6 14 11 " DO Tutorial "
  24. /SET Default ""
  25. /GETS Label Default "Start at?"  "" UC
  26. /IF %Label NE "" TOP
  27. /GOTO %Label NOTFOUND
  28. :TOP
  29. /PAGEPROMPT
  30. .clr go 1 20 gray
  31. ┌───────────────────────────────────────────────────────────────────────────┐
  32. │                                                                           │
  33. └───────────────────────────────────────────────────────────────────────────┘
  34. /VERSION
  35. .go 8 7 cy
  36. T H E
  37. .cy go 57 13
  38. tutorial
  39. .pa 1 re
  40. /DRAW V 16 7 11 50 ▓
  41. /DRAW H 7 16 21 50 ▓
  42. /DRAW V 22 8 10 50 ▓
  43. /DRAW H 11 21 16 50 ▓
  44. /DRAW V 24 7 11 50 ▓
  45. /DRAW H 11 24 30 50 ▓
  46. /DRAW V 30 11 7 50 ▓
  47. /DRAW H 7 30 24 50 ▓
  48. .ye
  49. /WALK R 11 34 'S C R I P T   P R O C E S S O R' 100
  50. .pa 1 ye
  51. /WALK L 21 75 'Copyright BOBsWARE, Sacramento, CA 1989, 1990, 1991, 1992' 100
  52. :INTRODUCTION
  53. /INTRO
  54. :INSTALLING
  55. /INSTALL
  56. :LICENSE
  57. /LICENSE
  58. :SCRIPTS
  59. /SCRIPTS
  60. :VARIABLES
  61. /VARIABLE
  62. :SPECIAL
  63. /SPECIAL
  64. :LABELS
  65. /LABELS
  66. :COMMENTS
  67. /COMMENTS
  68. :FUNCTIONS
  69. :STRINGS
  70. /STRINGS
  71. :DATES
  72. /DATES
  73. :OTHER
  74. /FUNCTION.SCR
  75. :COMMANDS
  76. /COMMANDS
  77. :/ASK
  78. /ASK.SCR
  79. :/SET
  80. /SET.SCR
  81. :/CAL
  82. /CAL.SCR
  83. :/BIG
  84. /BIG.SCR
  85. :/CANCEL
  86. :/BOX
  87. /BOX.SCR
  88. :/CANCEL
  89. /CANCEL.SCR
  90. :/CD
  91. /CD.SCR
  92. :/CHAIN
  93. /CHAIN.SCR
  94. :CHAIN2
  95.  
  96.     You have now returned to the Tutorial Script.
  97.  
  98.  
  99. /BOX 2 1 52 3 14 15 " Tutorial Script "
  100. :/CLEAR
  101. /CLEAR.SCR
  102. :/CLOCK
  103. /CLOCK.SCR
  104. :/DOCUMENT
  105. /DOCUMENT.SCR
  106. :/DIR
  107. /DIR.SCR
  108. :FILES
  109. /FILES.SCR
  110. :/OPEN
  111. /OPEN.SCR
  112. :/CLOSE
  113. /CLOSE.SCR
  114. :/WRITE
  115. /WRITE.SCR
  116. :/READ
  117. /READ.SCR
  118. :/DEBUG
  119. /DEBUG.SCR
  120. :/IF
  121. /IF.SCR
  122. :/DISPLAY
  123. /DISPLAY.SCR
  124. :!
  125. /DOIT
  126. :/DRAW
  127. /DRAW.SCR
  128. :/EDIT
  129. /EDIT.SCR
  130. :/ERASE
  131. /ERASE.SCR
  132. :/EXEC
  133. /EXEC.SCR
  134. :/EXIT
  135. /EXIT.SCR
  136. :/FRAME
  137. /BOXFRAME.SCR
  138. :/GETC
  139. /GETC.SCR
  140. :/GD
  141. /GD.SCR
  142. :/GETS
  143. /GETS.SCR
  144. :/GOTOC
  145. /GOTOC.SCR
  146. :/GOTO
  147. /GOTO.SCR
  148. :/GOSUB
  149. /GOSUB.SCR
  150. :/HALT
  151. /HALT.SCR
  152. :/EXIST
  153. /EXIST.SCR
  154. :/INTERACTIVE
  155. /INTERACT.SCR
  156. :/LIST
  157. /LIST.SCR
  158. :MACROS
  159. :/MACROS
  160. /MACROS.SCR
  161. :/MD
  162. /MD.SCR
  163. :/MATH
  164. /MATH.SCR
  165. :/PASSWORD
  166. /PASSWORD.SCR
  167. :/PAUSE
  168. /PAUSE.SCR
  169. :/PRINT
  170. /PRINT.SCR
  171. :/RENAME
  172. /RENAME.SCR
  173. :/REPEAT
  174. /REPEAT.SCR
  175. :/INKEY
  176. /INKEY.SCR
  177. :/RETURN
  178. /RETURN.SCR
  179. :/RETURNCODE
  180. /RETURNCD.SCR
  181. :/INC
  182. :/DEC
  183. /INCDEC.SCR
  184. :/PAGE
  185. /PAGE.SCR
  186. :/PAGEPROMPT
  187. /PGPROMPT.SCR
  188. :/PARSE
  189. /PARSE.SCR
  190. :/RD
  191. /RD.SCR
  192. :/STOP
  193. /STOP.SCR
  194. /CANCEL ALL
  195. .clr
  196.  
  197.     You have been returned to the »ye«TUTORIAL»#« script to continue
  198.     your tutorial.  We have reset the »%t«/CANCEL»#« command to »wh«cancel all
  199.     scripts»#« from this point.
  200.  
  201. :/SUBST
  202. /SUBST.SCR
  203. :/VERSION
  204. /VERSION.SCR
  205. :/WALK
  206. /WALK.SCR
  207. :COMM
  208. /COMMFUNC
  209. :/INITCOM
  210. /INITCOM.SCR
  211. :/TERM
  212. /TERM.SCR
  213. :/CLOSECOM
  214. /CLOSECOM.SCR
  215. :/SEND
  216. /SEND.SCR
  217. :/DIAL
  218. /DIAL.SCR
  219. :/SETCOMDELAY
  220. /SETDELAY.SCR
  221. :/SETWAIT
  222. /SETWAIT.SCR
  223. :/DELWAIT
  224. /DELWAIT.SCR
  225. :/CWAIT
  226. /CWAIT.SCR
  227. :/LOOK
  228. /LOOKAT.SCR
  229. :/FLUSHCOM
  230. /FLUSHCOM.SCR
  231. :END
  232. .pg wi full clr wi 10 7 79 24 wh
  233. /VERSION
  234.  
  235. This is the end of the »%t«DO»ye« Tutorial»wh«. For additional
  236. information and practice, you might want to examine
  237. this script, the sample scripts, and create scripts
  238. of your own.
  239.  
  240. /BOX 8 6 65 13 12 14 " Thank You "
  241. .pg -24 wi full clr
  242. /GOTO EOF
  243. :NotWritten
  244. .pg wi full c 0 7 clr go 1 10
  245.     »c 4 7«%Section»c 0 7« has not been written yet»+c 4 7«!»c 0 7«
  246. .pg -24 #
  247. /RETURN
  248. :NOTFOUND
  249. .clr bell
  250.  
  251.  
  252.                       »wh«The label »bo«%Label»wh« was not found.»#«
  253.  
  254.  
  255. /box 1 1 80 5 14 7 " E R R O R ! "
  256.  
  257.  
  258.     Press »bo«<enter>»#« to start at the top of the script or
  259.           »bo«<esc>»#« to terminate tutorial.
  260.  
  261. /PAGEPROMPT "Press <enter> to continue <esc> to abort . . ."
  262. /PAGE
  263. /PAGEPROMPT
  264. :NOLABEL
  265. /GOTO TOP
  266. :EOF
  267. .wi full clr
  268. /SET LIST %HoldList
  269. /SET EDIT %HoldEdit
  270. * Clear variable memory
  271. /ENDEXEC CLEAR
  272. * -------------- End of Tutorial Script ----------------
  273.